home *** CD-ROM | disk | FTP | other *** search
/ Scene 96 / Scene 96 International Edition (Zyklop Software) (Disc 2) (1997).iso / misc / coding / pump_src / rlea.asm < prev    next >
Assembly Source File  |  1995-10-26  |  871b  |  36 lines
  1. .386
  2. _DATA   SEGMENT PARA PUBLIC USE32 'DATA'
  3. _DATA   ENDS
  4. _TEXT           SEGMENT PARA PUBLIC USE32 'CODE'
  5.                 ASSUME CS:_TEXT, DS:_DATA
  6.  
  7.                 PUBLIC RLE_Draw_
  8. RLE_Draw_       PROC
  9.                 xor ecx,ecx
  10.                 cld
  11. buc:            mov cl,[esi]
  12.                 mov al,[esi+1]
  13.                 not al
  14.                 or  cl,cl
  15.                 jz  end
  16.                 mov ebx,ecx
  17.                 mov ah,al
  18.                 shl eax,8
  19.                 mov al,ah
  20.                 shl eax,8
  21.                 mov al,ah
  22.                 shr ecx,2
  23.                 rep stosd
  24.                 mov ecx,ebx
  25.                 and ecx,3
  26.                 rep stosb
  27.                 inc esi
  28.                 inc esi
  29.                 jmp buc
  30. end:
  31.                 ret
  32. RLE_Draw_       ENDP
  33.  
  34. _TEXT           ENDS
  35.                 END
  36.